home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / jazlib.arc / JZKEYPRS.ASM < prev    next >
Encoding:
Assembly Source File  |  1988-12-18  |  283 b   |  17 lines
  1.     assume cs:_text
  2. _text    segment public byte 'code'
  3.     public _jzkeyprs
  4.  
  5. _jzkeyprs   proc near
  6.  
  7.     mov ah,1
  8.     int 16h     ; get key status
  9.     mov ax,1    ; assume key pressed
  10.     jnz exit    ; report char ready
  11.     mov ax,0    ; report no char ready
  12. exit:
  13.     ret
  14. _jzkeyprs   endp
  15. _text    ends
  16. end
  17.